Notes/Domino 6 and 7 Forum : Trying to authenticate LDAP from VB.NET

I'm developing a VB.NET application to authenticate Notes users from the web against our Notes server using LDAP (we are running LDAP on Notes).

I simply want to require a user to submit their Notes username and password on a webpage and if valid, allow them into the rest of the website. If not, I don't let them in.

I'm playing around with the following and I'm not having much luck. First off, I'm thinking that the LDAP server should be configured NOT to allow anonymous access? (Otherwise, the instantiation of the oRoot object would always work regardless of incorrect password????)

At any rate, in my "Try...Catch" loop is where I get the error - "The requested authentication method is not supported by the server"

In any case, do I even need to use the DirectorySearcher object if all I want to do is verify username/password? Regardless, I'd like to know why it seems I can get a session but then get a "not supported by server" error.

Any help would be appreciated. Thanks.

=======================================================================

Dim sServerName As String = "servername:636" 'port 636 since we are running secure

Dim oRoot As DirectoryEntry = New DirectoryEntry("LDAP://" + sServerName, txtUserName.Text, txtPassword.Text, AuthenticationTypes.Secure)

Dim oSearcher As DirectorySearcher = New DirectorySearcher(oRoot)
Dim oResults As SearchResultCollection
Dim oResult As SearchResult
Dim oProp As ResultPropertyCollection
Dim sData As String = ""
Dim iCnt As Integer

Try
oSearcher.PropertiesToLoad.Add("uid")
'oSearcher.PropertiesToLoad.Add("Name")
'oSearcher.PropertiesToLoad.Add("memberof")
'oSearcher.PropertiesToLoad.Add("description")
oResults = oSearcher.FindAll
Response.Write("Success")
Catch e As Exception
'mbValidUser = False
Response.Write("Error is " & e.Message)
Return False
End Try